Project_Feedback_Anuwat #1
Conversation
| @@ -5,14 +5,14 @@ subtitle: Visualization and Classification for Larceny, Assault and Harassment | |||
| output: html_document | |||
| --- | |||
|
|
|||
| # Introduction | |||
| # Introduction | |||
There was a problem hiding this comment.
The introduction is very clear about what you are doing. It would be a more scientific introduction if you could add an objective or a hypothesis of your study at the end of the introduction.
There are some typos such as visulazation, and occurance, please check it again.
| @@ -201,12 +201,12 @@ Still Working on it... | |||
|
|
|||
| # Results | |||
|
|
|||
| ## Top ten most committed crime types | |||
| ## Top ten most committed crime types | |||
There was a problem hiding this comment.
Awesome results! I like it a lot. It would be better if you would use spec_color, spec_font_size or fullwidth to be the more attractive and user-friendly table.
| ```{r echo=FALSE} | ||
| kable(top10_Crime_MAN[1:10,]) | ||
| ``` | ||
|
|
||
| ## The Preference on Time of Top Three Committed Crime Types | ||
| ## The Preference on Time of Top Three Committed Crime Types |
There was a problem hiding this comment.
Great job! This graph provides me useful information about the relationship between time and amount of top three committed crime types. I think it could be better if you could add a period of the dataset in the title (2015-2017), add units of data on x- and y-axis that would help readers easier to understand the graph. In addition, please describe the meaning of NA in the footnote, which helps readers better understanding.
| @@ -215,7 +215,7 @@ ggplot(time_top3,aes(x = TimeInterval, y= amount,group=1))+ | |||
| theme(legend.position = "none",axis.text.x = element_text(angle = 60, hjust = 1)) | |||
| ``` | |||
|
|
|||
| ## The Preference on Day of Week of Top Three Committed Crime Types | |||
| ## The Preference on Day of Week of Top Three Committed Crime Types | |||
There was a problem hiding this comment.
Awesome job! I think it could be better if you could add a period of the dataset in the title (2015-2017), add units of data on the x-axis label that would help readers easier to understand the graph.
| @@ -228,4 +228,4 @@ ggplot(dw_top3,aes(x = DayofWeek, y= amount, group = 1))+ | |||
|
|
|||
| What have you learned? Are there any broader implications? | |||
|
|
|||
| # References | |||
| # References | |||
Very nice job